home *** CD-ROM | disk | FTP | other *** search
/ Practical Internet 2002 May / Practical Internet May 2002.iso / pc / Software / SiteBuilding / MiniMapperPlus.exe / Favourites to HTML / Favorite.hta < prev    next >
Encoding:
Text File  |  2001-06-15  |  2.5 KB  |  98 lines
  1. <html>
  2. <head>
  3. <title>Favorites to HTML</title>
  4. <meta http-equiv="Content-Type" content="text/html; charset=iso-8859-1">
  5.   <HTA:APPLICATION ID="oMyApp" 
  6.     APPLICATIONNAME="Favorites to HTML" 
  7.     BORDER="yes"
  8.     CAPTION="yes"
  9.     SCROLL="no"
  10.     ICON="Favorite.ico"
  11.     SHOWINTASKBAR="yes"
  12.     SINGLEINSTANCE="yes"
  13.     SYSMENU="yes"
  14.     INNERBORDER="no"
  15.     CONTEXTMENU = "no"
  16.   />
  17. <script language="javascript">
  18. resizeTo (460,240);
  19. function doSave() {
  20.     if (infile.value=="") { alert("Please enter your Favorites location."); return;}
  21.     else if (outfile.value=="") { alert("Please select an output file."); return;}
  22.  
  23. var filein = infile.value;
  24. var fileout= outfile.value;
  25.     try {
  26.         favorite.save( filein, fileout );
  27.         alert("Favorites saved to " + fileout);
  28.     } catch (e) { alert(e.description); }
  29. }
  30. function getFav() {
  31.    var wshShell = new ActiveXObject("WScript.Shell");
  32.     try {
  33.         infile.value = wshShell.SpecialFolders("Favorites");
  34.         outfile.value= wshShell.SpecialFolders("MyDocuments") + "\\Favorite.htm";
  35.     } catch (e) { alert(e.description); }
  36.     wshShell = null;
  37. }
  38. </script>
  39. <script language="javascript" for="iconpath" event="onchange">
  40.     try {
  41. favorite.setPath(this.value);
  42.     } catch (e) { alert(e.description); }
  43. </script>
  44. <script language="javascript" for="foldersfirst" event="onchange">
  45. favorite.setOrder(this.checked);
  46. </script>
  47. <style type="text/css">
  48. <!--
  49. body {  font-family: Verdana, Arial, Helvetica, sans-serif; background-color: buttonface; font-size: 8pt;}
  50. td {  font-size: 8pt}
  51. h2 {  font-size: 12pt}
  52. -->
  53. </style>
  54. </head>
  55.  
  56. <body bgcolor="#FFFFFF" onload="getFav();">
  57.  
  58. <h2>Favorites to HTML</h2>
  59. <object code="Favorite.class" id="favorite" vspace="0" hspace="0" width="100%" height="2">
  60. </object>
  61. <table border="0" cellspacing="2" cellpadding="2">
  62. <tr>
  63. <td>Favorites path:</td>
  64. <td>
  65. <input type="text" name="infile" size="35">
  66. </td>
  67. <td> </td>
  68. </tr>
  69. <tr>
  70. <td>Save Path: </td>
  71. <td>
  72. <input type="text" name="outfile" size="35">
  73. </td>
  74. <td> </td>
  75. </tr>
  76. <tr>
  77. <td>Image path:</td>
  78. <td>
  79. <input type="text" name="iconpath" value="icons\" size="35">
  80. </td>
  81. <td> </td>
  82. </tr>
  83. <tr>
  84. <td nowrap>List folders first?</td>
  85. <td>
  86. <input type="checkbox" name="foldersfirst" value="checkbox">
  87. </td>
  88. <td> </td>
  89. </tr>
  90. <tr>
  91. <td> </td>
  92. <td><button name="saveit" onclick="doSave();">Save</button></td>
  93. <td><button name="exit" onclick="window.close();"> Exit </button></td>
  94. </tr>
  95. </table>
  96. </body>
  97. </html>
  98.